home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The X-Philes (2nd Revision)
/
The X-Philes Number 1 (1995).iso
/
xphiles
/
hp48_2
/
peek.sys
< prev
next >
Wrap
Text File
|
1991-04-12
|
1KB
|
42 lines
Article 1556 of comp.sys.handhelds:
Path: en.ecn.purdue.edu!pur-ee!mentor.cc.purdue.edu!noose.ecn.purdue.edu!iuvax!mailrus!cs.utexas.edu!uunet!microsoft!alonzo
From: alonzo@microsoft.UUCP (Alonzo GARIEPY)
Newsgroups: comp.sys.handhelds
Subject: HP48: SYSEVAL PEEK
Message-ID: <53610@microsoft.UUCP>
Date: 16 Mar 90 21:43:16 GMT
References: <53609@microsoft.UUCP>
Reply-To: alonzo@microsoft.UUCP (Alonzo GARIEPY)
Organization: Microsoft Corp., Redmond WA
Lines: 27
Here is a SYSEVAL based PEEK program for the HP 48. This technique
was invented by Rick Grevelle for the HP 28. The SYSEVAL addresses
were found by Dave Kaffine and myself. This is reasonably fast and
requires no machine code.
PEEK [CD20]
<<
10 - ; Adjustment, 10 nybbles
# 4003h SYSEVAL ; Short integer, 00002
# 56B6h SYSEVAL DROP ; GET, address past 0001502A70
# 540BBh SYSEVAL ; Get contents
OBJ-> ; String->binary integer
>>
But the program is imperfect. There are 24 addresses for which it
does not work:
0291B 0293D 0295F 02981 029A7 029C9 029F2 02A14 02A36 02A58 02A7E 02AA0
02AC2 02AE4 02B06 02B28 02B4A 02B6C 02B92 02DA7 02DD6 02E52 02E77 02E9C
Each of these is 10 greater than the address of an object type.
All the usual caveats apply. If you're going to mess with SYSEVALS
or machine code, backup your HP 48 occasionally.
Alonzo Gariepy
alonzo@microsoft